Delphi Magazine Collection 2001/Delphi Magazine Collection 20001 (2001).iso/DISKS/Issue59/Arch/Extended Sample/UnitFormListBase.dfm/UnitFormListBase.txt

Text File | 2000-05-22 | 5.4 KB | 219 lines

inherited FormListBase: TFormListBase
  Left = 623
  Top = 267
  Width = 438
  Height = 510
  Caption = 'FormListBase'
  OldCreateOrder = True
  PopupMenu = PopupMenu
  PixelsPerInch = 96
  TextHeight = 13
  object PanelListBaseBottom: TPanel [0]
    Left = 0
    Top = 450
    Width = 430
    Height = 33
    Align = alBottom
    BevelOuter = bvNone
    TabOrder = 0
    Visible = False
    object ButtonOkApply: TButton
      Left = 586
      Top = 4
      Width = 75
      Height = 25
      Action = ActionApply
      Anchors = [akRight, akBottom]
      Default = True
      TabOrder = 0
    end
    object ButtonCancelClose: TButton
      Left = 670
      Top = 4
      Width = 75
      Height = 25
      Action = ActionClose
      Anchors = [akRight, akBottom]
      Cancel = True
      ModalResult = 2
      TabOrder = 1
    end
    object PanelListBaseApplyClose: TPanel
      Left = 263
      Top = 0
      Width = 167
      Height = 33
      Align = alRight
      AutoSize = True
      BevelOuter = bvNone
      BorderWidth = 4
      TabOrder = 2
      object ButtonListBaseApply: TButton
        Left = 4
        Top = 4
        Width = 75
        Height = 25
        Caption = 'Apply'
        TabOrder = 0
      end
      object ButtonListBaseClose: TButton
        Left = 88
        Top = 4
        Width = 75
        Height = 25
        Caption = 'Close'
        TabOrder = 1
      end
    end
  end
  object PanelListBaseClientBackground: TPanel [1]
    Left = 0
    Top = 89
    Width = 430
    Height = 361
    Align = alClient
    BevelOuter = bvNone
    BorderWidth = 2
    Caption = 'PanelListBaseClientBackground'
    TabOrder = 1
    object PanelListBaseGridBackground: TPanel
      Left = 2
      Top = 2
      Width = 426
      Height = 357
      Align = alClient
      BorderWidth = 4
      TabOrder = 0
      object StatusBarAbstract: TStatusBar
        Left = 5
        Top = 333
        Width = 416
        Height = 19
        Panels = <>
        SimplePanel = False
      end
    end
  end
  object ToolBar1: TToolBar [2]
    Left = 0
    Top = 0
    Width = 430
    Height = 29
    Caption = 'ToolBar1'
    EdgeBorders = [ebBottom]
    Images = ImageListBase
    TabOrder = 2
    object ToolButton4: TToolButton
      Left = 0
      Top = 2
      Width = 8
      Caption = 'ToolButton4'
      ImageIndex = 1
      Style = tbsSeparator
    end
    object ToolButton1: TToolButton
      Left = 8
      Top = 2
      Action = ActionFind
    end
    object ToolButton2: TToolButton
      Left = 31
      Top = 2
      Width = 8
      Caption = 'ToolButton2'
      ImageIndex = 3
      Style = tbsSeparator
    end
    object ToolButton3: TToolButton
      Left = 39
      Top = 2
      Action = ActionOpen
    end
  end
  object PanelFilter: TPanel [3]
    Left = 0
    Top = 29
    Width = 430
    Height = 60
    Align = alTop
    BevelOuter = bvNone
    TabOrder = 3
    object BitBtnFind: TBitBtn
      Left = 671
      Top = 4
      Width = 75
      Height = 25
      Action = ActionFind
      Anchors = [akTop, akRight]
      Caption = 'Find'
      Default = True
      TabOrder = 0
      Glyph.Data = {
        42020000424D4202000000000000420000002800000010000000100000000100
        1000030000000002000000000000000000000000000000000000007C0000E003
        00001F0000001F7C00001F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C
        1F7C1F7C1F7C0000000000001F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C
        1F7C1F7C1F7C1F7C0000000000001F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C
        1F7C1F7C1F7C1F7C1F7C0000000000001F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C
        1F7C1F7C1F7C1F7C1F7C1F7C0000000000001F7C104200000000000000001042
        1F7C1F7C1F7C1F7C1F7C1F7C1F7C0000000000000000FF7FFF7FFF7FFF7F0000
        00001F7C1F7C1F7C1F7C1F7C1F7C1F7C00001042FF03FF03FF7FFF7FFF7FFF7F
        104200001F7C1F7C1F7C1F7C1F7C104200001863FF03FF7FFF7FFF7FFF7FFF7F
        FF7F000010421F7C1F7C1F7C1F7C0000FF7FFF03FF7FFF7FFF7FFF7FFF7FFF7F
        FF7FFF7F00001F7C1F7C1F7C1F7C0000FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F
        FF7FFF7F00001F7C1F7C1F7C1F7C0000FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F
        FF03FF7F00001F7C1F7C1F7C1F7C0000FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F
        FF03FF7F00001F7C1F7C1F7C1F7C10420000FF7FFF7FFF7FFF7FFF7FFF7FFF03
        FF03000010421F7C1F7C1F7C1F7C1F7C00001042FF7FFF7FFF7FFF03FF03FF03
        104200001F7C1F7C1F7C1F7C1F7C1F7C1F7C00000000FF7FFF7FFF7FFF7F0000
        00001F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C104200000000000000001042
        1F7C1F7C1F7C}
    end
    object BitBtn2: TBitBtn
      Left = 671
      Top = 32
      Width = 75
      Height = 25
      Anchors = [akTop, akRight]
      Caption = 'New Search'
      TabOrder = 1
    end
  end
  object PopupMenu: TPopupMenu
    Images = ImageListBase
    Left = 280
    Top = 40
    object Open1: TMenuItem
      Action = ActionOpen
    end
    object Find1: TMenuItem
      Action = ActionFind
    end
  end
  object ActionList: TActionList
    Images = ImageListBase
    Left = 212
    Top = 40
    object ActionApply: TAction
      Caption = 'Apply'
      OnExecute = ActionApplyExecute
    end
    object ActionClose: TAction
      Caption = 'Close'
      OnExecute = ActionCloseExecute
    end
    object ActionFind: TAction
      Caption = 'Find'
      ImageIndex = 2
      ShortCut = 16454
      OnExecute = ActionFindExecute
    end
    object ActionOpen: TAction
      Caption = 'Open'
      ImageIndex = 3
      OnExecute = ActionOpenExecute
      OnUpdate = ActionOpenUpdate
    end
  end
end